Imports System.Xml.Serialization
Imports DotNetNuke.UI.WebControls

Namespace Aricie.DNN.Caching.Client.Velocity
    <Serializable(), System.Xml.Serialization.XmlRoot("host")> _
    Public Class VelocityHostInfo
        Inherits CachingPortBasedHostInfo

        Public Sub New()
            If Me.CachePort = 0 Then
                Me.CachePort = 22233
            End If
        End Sub

        Private _CacheHostName As String = "DistributedCacheService"


        <XmlElement("cacheHostName")> _
            <Required(True)> _
            <SortOrder(2)> _
        Public Property CacheHostName() As String
            Get
                Return _CacheHostName
            End Get
            Set(ByVal value As String)
                _CacheHostName = value
            End Set
        End Property

    End Class
End Namespace